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Calculate Kp = K 
Calculate Ki = K*Tc/Ti 
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Calculate New ZLooding: 
Lcad_NewZ = LoadZ + Kp*Rate + KI* Error 




Set LoadZ = 0% 



Set LoadZ = WOZ 



Set ioadZ = 
Lood^NewZ 
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Checking Operating Sicte 
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{Start ) 



- Tune = Tune + f 

- Read Cond. Temp. & St. 

- ER = Abs(Cond. Temp. - St.) 




SSLP = 

SSLP-SSLP/Tune 
+LoadZ/Tune 
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Start 
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<4nd{S_0pen = ISO, 
Or S_Oose 

No 



System Failure = True; 
System Alarm May Be Due To: 

- No Refrigerant Flow 

Through Cose 

- Loss Of Charge 

- Bad Sensor 

- No Air flow 

- Undersize Compressor 



ER.OId = ER.New; Knew =K 
ER_New = SjER/1800'IOO 
System Alarm = False 
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Dir = (£R_New-£R_0!d) 


*{K_New - K_Otd) 












KJ)ld = K_New 
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Coll Fu?zy_Tune(£r_New, 


KM m, K_New) 





K_New = JO 



K_New = 




If K_New = K_Cld And ER_New < W 
And ER_Old < 60 Then K_New = W 



K = K_New 



If ((ER_New-ER_Old) > 0 And ER_New > 50) 
Or Sleady_State_load_Percent = 0 Then 
Steady_Stote_Load_Percent = SSIP 
Store Steady_Stote_Lcad_Perc€nt In EEPRCM Endif 
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